package cn.cj.erp.common.security.aspect;

import cn.cj.erp.bo.system.SysRoleBo;
import cn.cj.erp.bo.system.SysUserBo;
import cn.cj.erp.common.SearchParam;
import cn.cj.erp.common.security.annotation.DataScope;
import cn.cj.erp.common.security.security.context.PermissionContextHolder;
import cn.cj.erp.common.security.security.utils.SecurityUtils;
import cn.cj.erp.common.utils.UserUtils;
import cn.hutool.core.collection.CollectionUtil;
import cn.hutool.core.util.ObjectUtil;
import cn.cj.erp.common.enums.DataScopeTypeEnum;
import cn.cj.erp.common.exception.ServiceException;
import cn.cj.erp.common.security.security.user.LoginUser;
import cn.hutool.core.util.StrUtil;
import lombok.extern.slf4j.Slf4j;
import org.aspectj.lang.JoinPoint;
import org.aspectj.lang.annotation.Aspect;
import org.aspectj.lang.annotation.Before;
import org.springframework.stereotype.Component;
import java.util.*;

/**
 * 数据过滤，切面处理类
 *
 * @author chenjian
 */
@Slf4j
@Aspect
@Component
public class DataScopeAspect {

    @Before("@annotation(controllerDataScope)")
    public void doBefore(JoinPoint point, DataScope controllerDataScope) {
        clearDataScope(point);
        handleDataScope(point, controllerDataScope);
    }

    protected void handleDataScope(final JoinPoint joinPoint, DataScope controllerDataScope) {
        // 获取当前的用户
        LoginUser loginUser = SecurityUtils.getLoginUser();
        if (ObjectUtil.isNull(loginUser)) {
            log.error("用户未登录，无法进行数据权限控制");
            throw new ServiceException("用户未登录，无法进行数据权限控制");
        }
        SysUserBo currentUser = loginUser.getUser();
        if (ObjectUtil.isNull(currentUser)) {
            log.error("用户【{}- {}】在系统中不存在，无法进行数据权限控制", loginUser.getUserId(), loginUser.getUsername());
            throw new ServiceException(String.format("用户【%d-%s】在系统中不存在，无法进行数据权限控制", loginUser.getUserId(), loginUser.getUsername()));
        }
        if (UserUtils.isAdmin(currentUser.getUserId())) {
            log.info("管理员不需要进行数据权限控制，直接返回");
            return;
        }
        String permission = StrUtil.emptyToDefault(controllerDataScope.permission(), PermissionContextHolder.getContext());
        dataScopeFilter(joinPoint, currentUser, controllerDataScope.deptAlias(), controllerDataScope.userAlias(), permission);


    }

    /**
     * 数据范围过滤
     *
     * @param joinPoint  切点
     * @param user       用户
     * @param deptAlias  部门别名
     * @param userAlias  用户别名
     * @param permission 权限字符（注解上要求的权限）
     */
    public static void dataScopeFilter(JoinPoint joinPoint,
                                       SysUserBo user,
                                       String deptAlias,
                                       String userAlias,
                                       String permission) {
        StringBuilder sqlString = new StringBuilder();
        List<DataScopeTypeEnum> conditions = new ArrayList<>();

        for (SysRoleBo role : user.getRoles()) {
            DataScopeTypeEnum dataScope = role.getDataScope();
            if (!DataScopeTypeEnum.CUSTOM.equals(dataScope) && conditions.contains(dataScope)) {
                // 非自定义，并已经处理过的数据权限，则处理下一个角色
                continue;
            }
            if (StrUtil.isNotEmpty(permission) && CollectionUtil.isNotEmpty(role.getPermissions())
                    && !CollectionUtil.containsAny(role.getPermissions(), StrUtil.split(permission, ','))) {
                // 方法上注解的权限非空，且角色中无该权限，则处理下一个角色
                continue;
            }
            if (DataScopeTypeEnum.ALL.equals(dataScope)) {
                sqlString = new StringBuilder();
                conditions.add(dataScope);
                break;
            } else if (DataScopeTypeEnum.CUSTOM.equals(dataScope)) {
                sqlString.append(StrUtil.format(
                        " OR {}.dept_id IN ( SELECT dept_id FROM sys_role_dept WHERE role_id = {} ) ", deptAlias,
                        role.getRoleId()));
            } else if (DataScopeTypeEnum.DEPT.equals(dataScope)) {
                sqlString.append(StrUtil.format(" OR {}.dept_id = {} ", deptAlias, user.getDeptId()));
            } else if (DataScopeTypeEnum.DEPT_SUB.equals(dataScope)) {
                sqlString.append(StrUtil.format(
                        " OR {}.dept_id IN ( SELECT dept_id FROM sys_dept WHERE dept_id = {} or find_in_set( {} , parent_ids ) )",
                        deptAlias, user.getDeptId(), user.getDeptId()));
            } else if (DataScopeTypeEnum.USER.equals(dataScope)) {
                if (StrUtil.isNotBlank(userAlias)) {
                    sqlString.append(StrUtil.format(" OR {}.user_id = {} ", userAlias, user.getUserId()));
                } else {
                    // 数据权限为仅本人且没有userAlias别名不查询任何数据
                    sqlString.append(StrUtil.format(" OR {}.dept_id = 0 ", deptAlias));
                }
            }
            conditions.add(dataScope);
        }

        // 多角色情况下，所有角色都不包含传递过来的权限字符，这个时候sqlString也会为空，所以要限制一下,不查询任何数据
        if (CollectionUtil.isEmpty(conditions)) {
            sqlString.append(StrUtil.format(" OR {}.dept_id = 0 ", deptAlias));
        }

        if (StrUtil.isBlank(sqlString.toString())) {
            log.info("无权限控制sql，退出");
            return;
        }
        SearchParam params = checkAndGetParam(joinPoint);
        params.setSqlFilter("(" + sqlString.substring(4) + ")");
    }

    /**
     * 拼接权限sql前先清空params.dataScope参数防止注入
     */
    private void clearDataScope(final JoinPoint joinPoint) {
        SearchParam params = checkAndGetParam(joinPoint);
        params.setSqlFilter("");
    }
    
    /** 
     * 检查参数是否允许进行数据过滤
     * @param joinPoint 连接点
     * @return SearchParam
     */
    private static SearchParam checkAndGetParam(final JoinPoint joinPoint) {
        String className = joinPoint.getTarget().getClass().getName();
        String methodName = joinPoint.getSignature().getName();
        Object arg = joinPoint.getArgs()[0];
        if (arg == null) {
            log.error("{}.{}()的参数为空，无法进行数据权限控制", className, methodName);
            throw new ServiceException(String.format("%s.%s()的参数为空，无法进行数据权限控制", className, methodName));
        }
        if (!(arg instanceof SearchParam)) {
            log.error("{}.{}()的参数类型【{}】不是SearchParam，无法进行数据权限控制", className, methodName, arg.getClass().getName());
            throw new ServiceException(String.format("%s.%s()的参数类型【%s】不是SearchParam，无法进行数据权限控制", className, methodName, arg.getClass().getName()));
        }
        return (SearchParam) arg;
    }
}
